procedure PrGetPage(var left, top, right, bottom : integer);

Returns the print page size in 72 dpi.  The printer port must be open first by calling PrOpen.

Also see:  PrOpen  PrPlotData